00100	REQUIRE "DDCALL[DD,BGB]" LOAD_MODULE;
00200	
00300	EXTERNAL PROCEDURE ERASTV;
00400	EXTERNAL PROCEDURE ERASDD;
00500	EXTERNAL PROCEDURE DPYDD  (STRING FILE;INTEGER ARRAY SWINDO,OWINDO,LEVELS);
00600	
00700	EXTERNAL PROCEDURE SETWND (REAL ARRAY SWN; INTEGER ARRAY DWN);
00800	EXTERNAL PROCEDURE SETLWN (REAL LX,LY,LDX,LDY);
00900	EXTERNAL PROCEDURE SETDWN (INTEGER R,C,M,N );
01000	
01100	EXTERNAL PROCEDURE AI     (SHORT REAL X,Y);
01200	EXTERNAL PROCEDURE AV     (SHORT REAL X,Y);
01300	EXTERNAL PROCEDURE DOT    (SHORT REAL X,Y);
01400	EXTERNAL PROCEDURE ARC    (REAL R,A,B);
01500	EXTERNAL PROCEDURE RADIAL (REAL R1,R2,B);
01600	EXTERNAL REAL PROCEDURE DMS (INTEGER X);
01700	
01800	EXTERNAL PROCEDURE DDSTR  (REAL    X,Y,CHN;STRING STR);
01900	EXTERNAL PROCEDURE DDSTRC (INTEGER R,C,CHN; STRING S);
02000	EXTERNAL PROCEDURE DDTYPE (INTEGER Y,GLITCHES,LINES);
02100	
02200	EXTERNAL PROCEDURE SHOWDD (INTEGER LEVCHN);
02300	EXTERNAL PROCEDURE DRUMDD (INTEGER FRAME);
02400	EXTERNAL PROCEDURE TVSEG  (STRING FILE,SEGNAM);